(dnd-get-local-file-name): Decode both upper and lower

case hex. Do not try to decode non-hex letters.

diff --git a/lisp/dnd.el b/lisp/dnd.el
index 2b523476a4f071484436bdfcb1912cac9faa430d..df081539cf0f0072f19a671a3ae96316677062e7 100644 (file)
--- a/lisp/dnd.el
+++ b/lisp/dnd.el
@@ -146,7 +146,7 @@ Return nil if URI is not a local file."
                  (substring uri (match-end 0))))))
     (when (and f must-exist)
       (setq f (replace-regexp-in-string
-              "%[A-Z0-9][A-Z0-9]"
+              "%[A-Fa-f0-9][A-Fa-f0-9]"
               (lambda (arg)
                 (format "%c" (string-to-number (substring arg 1) 16)))
               f nil t))